package com.raising.modules.sys.utils;



import com.raising.framework.spring.SpringUtils;
import com.raising.modules.sys.dao.SwordDao;
import com.raising.modules.sys.entity.Sword;
import com.raising.utils.JCacheUtils;
import com.raising.utils.JStringUtils;

import java.io.BufferedReader;
import java.io.File;
import java.io.FileInputStream;
import java.io.InputStreamReader;
import java.util.*;

public class SwordUtil {
	private static String ENCODING = "GBK";    //字符编码
	public static final String CACHE_SWORD_MAP = "sword";
	private static SwordDao swordDao = SpringUtils.getBean(SwordDao.class);
	public static int minMatchTYpe = 1;      //最小匹配规则
	public static int maxMatchType = 2;      //最大匹配规则

	/**
	 * 获取字符串中的所有敏感词
	 * @author gaoy
	 * 2017 2017-6-1 下午7:31:30
	 * @param txt
	 * @param matchType
	 * @return
	 */
	public static Set<String> getSensitiveWord(String txt , int matchType){
		Set<String> sensitiveWordList = new HashSet<String>();
		for(int i = 0 ; i < txt.length() ; i++){
			int length = CheckSensitiveWord(txt, i, matchType);    //判断是否包含敏感字符
			if(length > 0){    //存在,加入list中
				sensitiveWordList.add(txt.substring(i, i+length));
				i = i + length - 1;    //减1的原因，是因为for会自增
			}
		}
		return sensitiveWordList;
	}

	/**
	 * 判断文字是否包含敏感字符
	 * @author gaoy
	 * @date 2017年6月1日19:10:46
	 * @param txt  文字
	 * @param matchType  匹配规则&nbsp;1：最小匹配规则，2：最大匹配规则
	 * @return 若包含返回true，否则返回false
	 * @version 1.0
	 */
	public static boolean isContaintSensitiveWord(String txt,int matchType){
		boolean flag = false;
		for(int i = 0 ; i < txt.length() ; i++){
			int matchFlag = CheckSensitiveWord(txt, i, matchType); //判断是否包含敏感字符
			if(matchFlag > 0){    //大于0存在，返回true
				flag = true;
			}
		}
		return flag;
	}

	/**
	 * 替换敏感字字符
	 * @author gaoy
	 * @date 2017年6月1日19:10:46
	 * @param txt
	 * @param matchType
	 * @param replaceChar 替换字符，默认*
	 * @version 1.0
	 */
	public static String replaceSensitiveWord(String txt,int matchType,String replaceChar){
		String resultTxt = txt;
		Set<String> set = getSensitiveWord(txt, matchType);     //获取所有的敏感词
		Iterator<String> iterator = set.iterator();
		String word = null;
		String replaceString = null;
		while (iterator.hasNext()) {
			word = iterator.next();
			replaceString = getReplaceChars(replaceChar, word.length());
			resultTxt = resultTxt.replaceAll(word, replaceString);
		}
		return resultTxt;
	}


	/**
	 * 获取替换字符串
	 * @author gaoy
	 * @date 2017年6月1日19:10:46
	 * @param replaceChar
	 * @param length
	 * @return
	 * @version 1.0
	 */
	private static String getReplaceChars(String replaceChar,int length){
		String resultReplace = replaceChar;
		for(int i = 1 ; i < length ; i++){
			resultReplace += replaceChar;
		}
		return resultReplace;
	}

	/**
	 * 将Set集合转为HashMap
	 * @author gaoy
	 * 2017 2017-6-1 下午7:32:31
	 * @param keyWordSet
	 * @return
	 */
	@SuppressWarnings({ "rawtypes", "unchecked" })
	private static Map addSensitiveWordToHashMap(Set<String> keyWordSet) {
		Map sensitiveWordMap = new HashMap(keyWordSet.size());     //初始化敏感词容器，减少扩容操作
		String key = null;
		Map nowMap = null;
		Map<String, String> newWorMap = null;
		//迭代keyWordSet
		Iterator<String> iterator = keyWordSet.iterator();
		while(iterator.hasNext()){
			key = iterator.next();    //关键字
			nowMap = sensitiveWordMap;
			for(int i = 0 ; i < key.length() ; i++){
				char keyChar = key.charAt(i);       //转换成char型
				Object wordMap = nowMap.get(keyChar);       //获取

				if(wordMap != null){        //如果存在该key，直接赋值
					nowMap = (Map) wordMap;
				}
				else{     //不存在则，则构建一个map，同时将isEnd设置为0，因为他不是最后一个
					newWorMap = new HashMap<String,String>();
					newWorMap.put("isEnd", "0");     //不是最后一个
					nowMap.put(keyChar, newWorMap);
					nowMap = newWorMap;
				}

				if(i == key.length() - 1){
					nowMap.put("isEnd", "1");    //最后一个
				}
			}
		}
		return sensitiveWordMap;
	}
	/**
	 * 读取敏感词库，将敏感词放入HashSet中，构建一个DFA算法模型：<br>
	 * 中 = {
	 *      isEnd = 0
	 *      国 = {<br>
	 *      	 isEnd = 1
	 *           人 = {isEnd = 0
	 *                民 = {isEnd = 1}
	 *                }
	 *           男  = {
	 *           	   isEnd = 0
	 *           		人 = {
	 *           			 isEnd = 1
	 *           			}
	 *           	}
	 *           }
	 *      }
	 *  五 = {
	 *      isEnd = 0
	 *      星 = {
	 *      	isEnd = 0
	 *      	红 = {
	 *              isEnd = 0
	 *              旗 = {
	 *                   isEnd = 1
	 *                  }
	 *              }
	 *      	}
	 *      }
	 * @author gaoy
	 * 2017 2017-6-1 下午7:03:24
	 * @return
	 */
	@SuppressWarnings("rawtypes")
	public static HashMap getSensitiveWordMap(){
		Map sensitiveWordMap = (HashMap) JCacheUtils.get(JCacheUtils.SWORD_CACHE,CACHE_SWORD_MAP);
		if (sensitiveWordMap == null) {
        	sensitiveWordMap = addSensitiveWordToHashMap(getSetFromSQL());
            JCacheUtils.put(JCacheUtils.SWORD_CACHE, CACHE_SWORD_MAP,sensitiveWordMap);
        }
		return (HashMap) sensitiveWordMap;
	}
	/**
	 * 查询敏感词所属位置
	 * @author gaoy
	 * 2017 2017-6-1 下午7:33:17
	 * @param txt
	 * @param beginIndex
	 * @param matchType
	 * @return
	 */
	@SuppressWarnings("rawtypes")
	private static int CheckSensitiveWord(String txt,int beginIndex,int matchType){
		boolean  flag = false;    //敏感词结束标识位：用于敏感词只有1位的情况
		int matchFlag = 0;     //匹配标识数默认为0
		char word = 0;
		Map nowMap = getSensitiveWordMap();
		for(int i = beginIndex; i < txt.length() ; i++){
			word = txt.charAt(i);
			nowMap = (Map) nowMap.get(word);     //获取指定key
			if(nowMap != null){     //存在，则判断是否为最后一个
				matchFlag++;     //找到相应key，匹配标识+1
				if("1".equals(nowMap.get("isEnd"))){       //如果为最后一个匹配规则,结束循环，返回匹配标识数
					flag = true;       //结束标志位为true
					if(minMatchTYpe == matchType){    //最小规则，直接返回,最大规则还需继续查找
						break;
					}
				}
			}
			else{     //不存在，直接返回
				break;
			}
		}
		//长度必须大于等于1，为词
		if(matchFlag < 2 || !flag){
			matchFlag = 0;
		}
		return matchFlag;
	}

	/**
	 * 从数据库中获取敏感词集合
	 * @author gaoy
	 * 2017 2017-6-1 下午7:31:20
	 * @return
	 */
	private static Set<String> getSetFromSQL(){
		Set<String> set = new HashSet<String>();
    	for(Sword word:swordDao.getList(new Sword())){
    		if(word!=null && JStringUtils.isNotBlank(word.getName())){
    			set.add(word.getName());
    		}
    	}
    	return set;
	}
	/**
	 * 从文件中获取敏感词集合
	 * @author gaoy
	 * 2017 2017-6-1 下午7:31:05
	 * @return
	 * @throws Exception
	 */
	@SuppressWarnings("unused")
	private static Set<String> getSetFromFile() throws Exception{
		Set<String> set = null;
		File file = new File("D:\\SensitiveWord.txt");    //读取文件
		InputStreamReader read = new InputStreamReader(new FileInputStream(file),ENCODING);
		try {
			if(file.isFile() && file.exists()){      //文件流是否存在
				set = new HashSet<String>();
				BufferedReader bufferedReader = new BufferedReader(read);
				String txt = null;
				while((txt = bufferedReader.readLine()) != null){    //读取文件，将文件内容放入到set中
					set.add(txt);
			    }
			}
			else{         //不存在抛出异常信息
				throw new Exception("敏感词库文件不存在");
			}
		} catch (Exception e) {
			throw e;
		}finally{
			read.close();     //关闭文件流
		}
		return set;
	}

	public static void main(String[] args) {
		String string = "太多的伤感情怀八九民|1也许只局限于饲养基地 荧幕中的情节，主人公尝试着去用某种方式渐渐的很潇洒地释自杀指南怀那些自己经历的伤感。"
				+ "然后法轮功 我们的扮演的角色就是跟随着主人公的喜红客联盟 怒哀乐而过于牵强的把自己的情感也附加于银幕情节中，然后感动就流泪，"
				+ "难过就躺在某一个人的怀里尽情的阐述心扉或者手机卡复制器一个人一杯红酒一部电影在夜三级片 深人静的晚上，关上电话静静的发呆着。";
		System.out.println("待检测语句字数：" + string.length());
		long beginTime = System.currentTimeMillis();
		//获取字符串中含有的敏感词
		Set<String> set = SwordUtil.getSensitiveWord(string, SwordUtil.minMatchTYpe);
		long endTime = System.currentTimeMillis();
		System.out.println("语句中包含敏感词的个数为：" + set.size() + "。包含：" + set);
		System.out.println("总共消耗时间为：" + (endTime - beginTime));
		System.out.println("检查是否有敏感词："+ SwordUtil.isContaintSensitiveWord(string, SwordUtil.minMatchTYpe));
		beginTime = System.currentTimeMillis();
		System.out.println("替换所有敏感词："+ SwordUtil.replaceSensitiveWord(string, SwordUtil.minMatchTYpe,"*"));
		endTime = System.currentTimeMillis();
		System.out.println("替换总共消耗时间为：" + (endTime - beginTime));
	}
}
